<p class="Paragraph"><help:paragraphinfo state="U" number="3" xmlns:help="http://openoffice.org/2000/help"/>Using the angle Alpha, the Tan Function calculates the ratio of the length of the side opposite the angle to the length of the side adjacent to the angle in a right-angled triangle.</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="4" xmlns:help="http://openoffice.org/2000/help"/>Tan(Alpha) = side opposite the angle/side adjacent to angle</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="10" xmlns:help="http://openoffice.org/2000/help"/><span class="T1">Number:</span> Any numeric expression that you want to calculate the tangent for (in radians).</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="11" xmlns:help="http://openoffice.org/2000/help"/>To convert degrees to radians, multiply by Pi/180. To convert radians to degrees, multiply by 180/Pi.</p>
<p class="PropText"><help:paragraphinfo state="U" number="16" xmlns:help="http://openoffice.org/2000/help"/>REM In this example, the following entry is possible for a right-angled triangle:</p>
<p class="PropText"><help:paragraphinfo state="U" number="17" xmlns:help="http://openoffice.org/2000/help"/>REM The side opposite the angle and the angle (in degrees) to calculate the length of the side adjacent to the angle:</p>
<p class="PropText"><help:paragraphinfo state="U" number="19" xmlns:help="http://openoffice.org/2000/help"/>REM Pi = 3.1415926 is a pre-defined variable</p>
<p class="PropText"><help:paragraphinfo state="U" number="20" xmlns:help="http://openoffice.org/2000/help"/>Dim d1 as Double</p>
<p class="PropText"><help:paragraphinfo state="U" number="21" xmlns:help="http://openoffice.org/2000/help"/>Dim dAlpha as Double</p>
<p class="PropText"><help:paragraphinfo state="U" number="22" xmlns:help="http://openoffice.org/2000/help"/>d1 = InputBox$ ("Enter the length of the side opposite the angle: ","opposite")</p>
<p class="PropText"><help:paragraphinfo state="U" number="23" xmlns:help="http://openoffice.org/2000/help"/>dAlpha = InputBox$ ("Enter the Alpha angle (in degrees): ","Alpha")</p>
<p class="PropText"><help:paragraphinfo state="U" number="24" xmlns:help="http://openoffice.org/2000/help"/>Print "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180))</p>